home *** CD-ROM | disk | FTP | other *** search
/ Personal Computer World 2009 February / PCWFEB09.iso / Software / Shareware / IDimager Personal 4.2.0.3 / setup_IDimager_Personal_V4.exe / {app} / Scripts / SearchScripts / Search XMP Label.idscript < prev   
Delphi Borland Form  |  2007-06-02  |  4.8 KB

open in: MacOS 8.1     |     Win98     |     DOS

browse contents    |     view JSON data     |     view as text


This file was processed as: Delphi Borland Form (archive/borlandDelphiForm).

ConfidenceProgramDetectionMatch TypeSupport
100% dexvert Delphi Borland Form (archive/borlandDelphiForm) magic Supported
100% file Delphi compiled form 'TScriptModel' default
99% file data default
100% TrID Borland Form (generic) default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 54 50 46 30 0c 54 53 63 | 72 69 70 74 4d 6f 64 65 |TPF0.TSc|riptMode|
|00000010| 6c 00 0a 4f 4d 44 61 74 | 61 54 79 70 65 07 08 64 |l..OMDat|aType..d|
|00000020| 74 53 79 73 74 65 6d 0a | 52 65 73 75 6c 74 43 6f |tSystem.|ResultCo|
|00000030| 64 65 02 00 0c 53 63 72 | 69 70 74 73 2e 47 55 49 |de...Scr|ipts.GUI|
|00000040| 44 06 26 7b 38 34 45 35 | 37 31 41 30 2d 30 31 43 |D.&{84E5|71A0-01C|
|00000050| 39 2d 34 33 39 46 2d 39 | 43 36 34 2d 42 38 38 37 |9-439F-9|C64-B887|
|00000060| 45 42 35 41 33 37 39 39 | 7d 07 53 63 72 69 70 74 |EB5A3799|}.Script|
|00000070| 73 0e 01 04 47 55 49 44 | 06 20 43 31 37 36 43 44 |s...GUID|. C176CD|
|00000080| 36 32 33 32 45 39 34 43 | 39 33 41 33 30 32 44 33 |6232E94C|93A302D3|
|00000090| 34 43 38 34 45 35 31 42 | 45 31 05 53 74 61 74 65 |4C84E51B|E1.State|
|000000a0| 07 0a 6f 6d 49 6e 73 65 | 72 74 65 64 0a 53 63 72 |..omInse|rted.Scr|
|000000b0| 69 70 74 4e 61 6d 65 06 | 10 53 65 61 72 63 68 20 |iptName.|.Search |
|000000c0| 58 4d 50 20 4c 61 62 65 | 6c 06 41 75 74 68 6f 72 |XMP Labe|l.Author|
|000000d0| 06 0d 57 69 6c 66 72 69 | 65 64 20 48 6f 67 65 12 |..Wilfri|ed Hoge.|
|000000e0| 41 75 74 68 6f 72 49 6e | 66 6f 2e 53 74 72 69 6e |AuthorIn|fo.Strin|
|000000f0| 67 73 01 06 00 00 10 53 | 68 6f 72 74 44 65 73 63 |gs.....S|hortDesc|
|00000100| 72 69 70 74 69 6f 6e 06 | ab 53 65 61 72 63 68 20 |ription.|.Search |
|00000110| 66 6f 72 20 74 68 65 20 | 65 78 69 73 74 65 6e 63 |for the |existenc|
|00000120| 65 20 6f 66 20 61 20 58 | 4d 50 20 4b 65 79 77 6f |e of a X|MP Keywo|
|00000130| 72 64 0d 0a 0d 0a 42 61 | 73 65 64 20 6f 6e 20 61 |rd....Ba|sed on a|
|00000140| 20 53 51 4c 20 73 63 72 | 69 70 74 20 62 79 20 48 | SQL scr|ipt by H|
|00000150| 65 72 74 2e 0d 0a 0d 0a | 57 6f 72 6b 73 20 77 69 |ert.....|Works wi|
|00000160| 74 68 20 49 44 49 6d 61 | 67 65 72 20 33 2e 35 2e |th IDIma|ger 3.5.|
|00000170| 31 2e 20 4e 6f 20 67 75 | 61 72 61 6e 74 65 65 20 |1. No gu|arantee |
|00000180| 66 6f 72 20 66 75 74 75 | 72 65 20 76 65 72 73 69 |for futu|re versi|
|00000190| 6f 6e 73 20 61 73 20 74 | 68 65 20 73 63 72 69 70 |ons as t|he scrip|
|000001a0| 74 73 20 75 73 65 73 20 | 61 20 53 51 4c 20 71 75 |ts uses |a SQL qu|
|000001b0| 65 72 79 2e 0a 49 74 65 | 6d 73 2e 47 55 49 44 06 |ery..Ite|ms.GUID.|
|000001c0| 26 7b 41 44 39 37 43 38 | 37 36 2d 31 34 42 36 2d |&{AD97C8|76-14B6-|
|000001d0| 34 38 34 33 2d 38 41 38 | 30 2d 39 44 42 36 38 41 |4843-8A8|0-9DB68A|
|000001e0| 35 45 32 31 31 30 7d 05 | 49 74 65 6d 73 0e 01 04 |5E2110}.|Items...|
|000001f0| 47 55 49 44 06 20 39 39 | 42 38 39 38 30 32 42 35 |GUID. 99|B89802B5|
|00000200| 41 32 34 35 34 35 42 46 | 35 43 34 45 35 34 43 30 |A24545BF|5C4E54C0|
|00000210| 46 36 39 43 32 37 05 53 | 74 61 74 65 07 0a 6f 6d |F69C27.S|tate..om|
|00000220| 49 6e 73 65 72 74 65 64 | 08 49 74 65 6d 4e 61 6d |Inserted|.ItemNam|
|00000230| 65 06 10 53 65 61 72 63 | 68 20 58 4d 50 20 4c 61 |e..Searc|h XMP La|
|00000240| 62 65 6c 12 53 6f 75 72 | 63 65 43 6f 64 65 2e 53 |bel.Sour|ceCode.S|
|00000250| 74 72 69 6e 67 73 01 06 | 48 70 72 6f 63 65 64 75 |trings..|Hprocedu|
|00000260| 72 65 20 49 6e 69 74 69 | 61 6c 69 7a 65 3b 20 20 |re Initi|alize; |
|00000270| 20 20 2f 2f 20 75 73 65 | 20 74 68 69 73 20 70 72 | // use| this pr|
|00000280| 6f 63 65 64 75 72 65 20 | 66 6f 72 20 67 6c 6f 62 |ocedure |for glob|
|00000290| 61 6c 20 69 6e 69 74 69 | 61 6c 69 7a 61 74 69 6f |al initi|alizatio|
|000002a0| 6e 06 05 62 65 67 69 6e | 06 26 20 20 4d 61 69 6e |n..begin|.& Main|
|000002b0| 46 6f 72 6d 2e 50 6f 73 | 69 74 69 6f 6e 20 3a 3d |Form.Pos|ition :=|
|000002c0| 20 70 6f 53 63 72 65 65 | 6e 43 65 6e 74 65 72 3b | poScree|nCenter;|
|000002d0| 06 5f 20 20 65 66 58 4d | 50 6c 61 62 65 6c 2e 54 |._ efXM|Plabel.T|
|000002e0| 65 78 74 20 3a 3d 20 52 | 65 61 64 46 72 6f 6d 52 |ext := R|eadFromR|
|000002f0| 65 67 69 73 74 72 79 20 | 28 27 53 63 72 69 70 74 |egistry |('Script|
|00000300| 73 5c 58 4d 50 6c 61 62 | 65 6c 53 65 61 72 63 68 |s\XMPlab|elSearch|
|00000310| 27 2c 20 27 4c 61 73 74 | 51 75 65 72 79 27 2c 20 |', 'Last|Query', |
|00000320| 65 66 58 4d 50 6c 61 62 | 65 6c 2e 54 65 78 74 29 |efXMPlab|el.Text)|
|00000330| 3b 06 04 65 6e 64 3b 12 | 00 00 00 00 06 46 70 72 |;..end;.|.....Fpr|
|00000340| 6f 63 65 64 75 72 65 20 | 46 69 6e 61 6c 69 7a 65 |ocedure |Finalize|
|00000350| 3b 20 20 20 20 20 20 2f | 2f 20 75 73 65 20 74 68 |; /|/ use th|
|00000360| 69 73 20 70 72 6f 63 65 | 64 75 72 65 20 66 6f 72 |is proce|dure for|
|00000370| 20 67 6c 6f 62 61 6c 20 | 66 69 6e 61 6c 69 7a 61 | global |finaliza|
|00000380| 74 69 6f 6e 06 05 62 65 | 67 69 6e 06 4b 20 20 57 |tion..be|gin.K W|
|00000390| 72 69 74 65 54 6f 52 65 | 67 69 73 74 72 79 20 28 |riteToRe|gistry (|
|000003a0| 27 53 63 72 69 70 74 73 | 5c 58 4d 50 6c 61 62 65 |'Scripts|\XMPlabe|
|000003b0| 6c 53 65 61 72 63 68 27 | 2c 20 27 4c 61 73 74 51 |lSearch'|, 'LastQ|
|000003c0| 75 65 72 79 27 2c 20 65 | 66 58 4d 50 6c 61 62 65 |uery', e|fXMPlabe|
|000003d0| 6c 2e 54 65 78 74 29 3b | 06 04 65 6e 64 3b 12 00 |l.Text);|..end;..|
|000003e0| 00 00 00 06 17 70 72 6f | 63 65 64 75 72 65 20 70 |.....pro|cedure p|
|000003f0| 62 51 75 65 72 79 43 6c | 69 63 6b 3b 06 03 76 61 |bQueryCl|ick;..va|
|00000400| 72 06 1b 20 20 41 44 73 | 3a 20 54 44 42 58 4f 4d |r.. ADs|: TDBXOM|
|00000410| 43 6c 69 65 6e 74 44 61 | 74 61 53 65 74 3b 06 0f |ClientDa|taSet;..|
|00000420| 20 20 61 4e 6f 74 3a 20 | 73 74 72 69 6e 67 3b 06 | aNot: |string;.|
|00000430| 05 62 65 67 69 6e 06 1f | 20 20 53 63 72 65 65 6e |.begin..| Screen|
|00000440| 2e 43 75 72 73 6f 72 20 | 3a 3d 20 63 72 48 6f 75 |.Cursor |:= crHou|
|00000450| 72 47 6c 61 73 73 3b 12 | 00 00 00 00 06 1c 20 20 |rGlass;.|...... |
|00000460| 41 44 73 20 3a 3d 20 43 | 61 74 61 6c 6f 67 2e 4e |ADs := C|atalog.N|
|00000470| 65 77 44 61 74 61 73 65 | 74 3b 12 00 00 00 00 06 |ewDatase|t;......|
|00000480| 21 20 20 69 66 20 72 62 | 4e 6f 74 43 6f 6e 74 61 |! if rb|NotConta|
|00000490| 69 6e 2e 63 68 65 63 6b | 65 64 20 74 68 65 6e 20 |in.check|ed then |
|000004a0| 20 20 06 16 20 20 20 20 | 20 20 61 4e 6f 74 20 3a | .. | aNot :|
|000004b0| 3d 20 27 20 4e 4f 54 20 | 27 3b 06 06 20 20 65 6c |= ' NOT |';.. el|
|000004c0| 73 65 06 12 20 20 20 20 | 20 20 61 4e 6f 74 20 3a |se.. | aNot :|
|000004d0| 3d 20 27 20 27 3b 12 00 | 00 00 00 06 49 20 20 41 |= ' ';..|....I A|
|000004e0| 44 73 2e 43 6f 6d 6d 61 | 6e 64 54 65 78 74 20 3a |Ds.Comma|ndText :|
|000004f0| 3d 20 27 73 65 6c 65 63 | 74 20 69 2e 2a 20 66 72 |= 'selec|t i.* fr|
|00000500| 6f 6d 20 76 5f 43 61 74 | 61 6c 6f 67 49 74 65 6d |om v_Cat|alogItem|
|00000510| 20 69 20 77 68 65 72 65 | 20 69 2e 47 55 49 44 20 | i where| i.GUID |
|00000520| 69 6e 20 27 20 2b 06 56 | 20 20 20 20 20 20 20 20 |in ' +.V| |
|00000530| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 27 28 53 | | '(S|
|00000540| 45 4c 45 43 54 20 44 49 | 53 54 49 4e 43 54 20 49 |ELECT DI|STINCT I|
|00000550| 6d 61 67 65 47 55 49 44 | 20 46 52 4f 4d 20 69 64 |mageGUID| FROM id|
|00000560| 49 6d 61 67 65 58 4d 50 | 20 57 48 45 52 45 20 58 |ImageXMP| WHERE X|
|00000570| 4d 50 5f 50 72 6f 70 65 | 72 74 79 27 20 2b 06 27 |MP_Prope|rty' +.'|
|00000580| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000590| 20 20 20 20 20 61 4e 6f | 74 20 2b 20 27 4c 49 4b | aNo|t + 'LIK|
|000005a0| 45 20 27 27 27 20 2b 06 | 26 20 20 20 20 20 20 20 |E ''' +.|& |
|000005b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 65 66 | | ef|
|000005c0| 58 4d 50 6c 61 62 65 6c | 2e 54 65 78 74 20 2b 06 |XMPlabel|.Text +.|
|000005d0| 1b 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|000005e0| 20 20 20 20 20 20 27 27 | 27 29 27 3b 12 00 00 00 | ''|')';....|
|000005f0| 00 06 0b 20 20 41 44 73 | 2e 4f 70 65 6e 3b 06 25 |... ADs|.Open;.%|
|00000600| 20 20 53 65 61 72 63 68 | 52 65 73 75 6c 74 2e 49 | Search|Result.I|
|00000610| 74 65 6d 73 2e 41 64 64 | 44 61 74 61 73 65 74 20 |tems.Add|Dataset |
|00000620| 28 41 44 73 29 06 0c 20 | 20 41 44 73 2e 43 6c 6f |(ADs).. | ADs.Clo|
|00000630| 73 65 3b 12 00 00 00 00 | 06 2d 20 20 41 44 73 2e |se;.....|.- ADs.|
|00000640| 46 72 65 65 3b 20 20 20 | 20 20 20 20 20 20 20 20 |Free; | |
|00000650| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000660| 20 20 20 20 20 20 20 12 | 00 00 00 00 06 1d 20 20 | .|...... |
|00000670| 53 63 72 65 65 6e 2e 43 | 75 72 73 6f 72 20 3a 3d |Screen.C|ursor :=|
|00000680| 20 63 72 44 65 66 61 75 | 6c 74 3b 12 00 00 00 00 | crDefau|lt;.....|
|00000690| 06 1f 20 20 4d 61 69 6e | 46 6f 72 6d 2e 4d 6f 64 |.. Main|Form.Mod|
|000006a0| 61 6c 52 65 73 75 6c 74 | 20 3a 3d 20 6d 72 4f 6b |alResult| := mrOk|
|000006b0| 3b 06 04 65 6e 64 3b 00 | 07 56 65 72 73 69 6f 6e |;..end;.|.Version|
|000006c0| 06 03 31 2e 30 07 57 69 | 74 68 47 55 49 09 0b 4c |..1.0.Wi|thGUI..L|
|000006d0| 61 73 74 55 70 64 61 74 | 65 64 05 00 78 99 e9 40 |astUpdat|ed..x..@|
|000006e0| 76 43 99 0e 40 0a 50 65 | 72 73 69 73 74 65 6e 74 |vC..@.Pe|rsistent|
|000006f0| 08 0a 46 6f 72 6d 53 74 | 72 65 61 6d 0a 73 0b 00 |..FormSt|ream.s..|
|00000700| 00 54 50 46 30 0d 54 53 | 63 72 69 70 74 44 65 73 |.TPF0.TS|criptDes|
|00000710| 69 67 6e 0a 5f 31 5f 31 | 5f 31 5f 31 5f 31 04 4c |ign._1_1|_1_1_1.L|
|00000720| 65 66 74 02 05 03 54 6f | 70 02 0d 05 57 69 64 74 |eft...To|p...Widt|
|00000730| 68 03 c9 01 06 48 65 69 | 67 68 74 03 c7 00 07 43 |h....Hei|ght....C|
|00000740| 61 70 74 69 6f 6e 06 10 | 58 4d 50 20 4c 61 62 65 |aption..|XMP Labe|
|00000750| 6c 20 53 65 61 72 63 68 | 05 43 6f 6c 6f 72 07 09 |l Search|.Color..|
|00000760| 63 6c 42 74 6e 46 61 63 | 65 0c 46 6f 6e 74 2e 43 |clBtnFac|e.Font.C|
|00000770| 68 61 72 73 65 74 07 0f | 44 45 46 41 55 4c 54 5f |harset..|DEFAULT_|
|00000780| 43 48 41 52 53 45 54 0a | 46 6f 6e 74 2e 43 6f 6c |CHARSET.|Font.Col|
|00000790| 6f 72 07 0c 63 6c 57 69 | 6e 64 6f 77 54 65 78 74 |or..clWi|ndowText|
|000007a0| 0b 46 6f 6e 74 2e 48 65 | 69 67 68 74 02 f5 09 46 |.Font.He|ight...F|
|000007b0| 6f 6e 74 2e 4e 61 6d 65 | 06 0d 4d 53 20 53 61 6e |ont.Name|..MS San|
|000007c0| 73 20 53 65 72 69 66 0a | 46 6f 6e 74 2e 53 74 79 |s Serif.|Font.Sty|
|000007d0| 6c 65 0b 00 0e 4f 6c 64 | 43 72 65 61 74 65 4f 72 |le...Old|CreateOr|
|000007e0| 64 65 72 08 0a 44 65 73 | 69 67 6e 53 69 7a 65 01 |der..Des|ignSize.|
|000007f0| 03 c1 01 03 a5 00 00 0d | 50 69 78 65 6c 73 50 65 |........|PixelsPe|
|00000800| 72 49 6e 63 68 02 60 0a | 54 65 78 74 48 65 69 67 |rInch.`.|TextHeig|
|00000810| 68 74 02 0d 00 06 54 4c | 61 62 65 6c 06 4c 61 62 |ht....TL|abel.Lab|
|00000820| 65 6c 33 04 4c 65 66 74 | 02 0c 03 54 6f 70 02 61 |el3.Left|...Top.a|
|00000830| 05 57 69 64 74 68 02 65 | 06 48 65 69 67 68 74 02 |.Width.e|.Height.|
|00000840| 0d 07 43 61 70 74 69 6f | 6e 06 12 53 65 61 72 63 |..Captio|n..Searc|
|00000850| 68 65 64 20 58 4d 50 20 | 4c 61 62 65 6c 00 00 06 |hed XMP |Label...|
|00000860| 54 4c 61 62 65 6c 06 6c | 61 62 65 6c 32 04 4c 65 |TLabel.l|abel2.Le|
|00000870| 66 74 02 0c 03 54 6f 70 | 02 0f 05 57 69 64 74 68 |ft...Top|...Width|
|00000880| 03 f7 00 06 48 65 69 67 | 68 74 02 0d 07 43 61 70 |....Heig|ht...Cap|
|00000890| 74 69 6f 6e 06 36 53 65 | 61 72 63 68 20 66 6f 72 |tion.6Se|arch for|
|000008a0| 20 69 6d 61 67 65 73 20 | 77 69 74 68 20 6f 72 20 | images |with or |
|000008b0| 77 69 74 68 6f 75 74 20 | 74 68 65 20 73 70 65 63 |without |the spec|
|000008c0| 69 66 69 65 64 20 6c 61 | 62 65 6c 3a 00 00 07 54 |ified la|bel:...T|
|000008d0| 42 69 74 42 74 6e 07 70 | 62 51 75 65 72 79 04 4c |BitBtn.p|bQuery.L|
|000008e0| 65 66 74 02 0a 03 54 6f | 70 03 80 00 05 57 69 64 |eft...To|p....Wid|
|000008f0| 74 68 02 4b 06 48 65 69 | 67 68 74 02 19 07 41 6e |th.K.Hei|ght...An|
|00000900| 63 68 6f 72 73 0b 06 61 | 6b 4c 65 66 74 08 61 6b |chors..a|kLeft.ak|
|00000910| 42 6f 74 74 6f 6d 00 07 | 43 61 70 74 69 6f 6e 06 |Bottom..|Caption.|
|00000920| 06 26 51 75 65 72 79 08 | 54 61 62 4f 72 64 65 72 |.&Query.|TabOrder|
|00000930| 02 03 0a 47 6c 79 70 68 | 2e 44 61 74 61 0a e2 01 |...Glyph|.Data...|
|00000940| 00 00 de 01 00 00 42 4d | de 01 00 00 00 00 00 00 |......BM|........|
|00000950| 76 00 00 00 28 00 00 00 | 24 00 00 00 12 00 00 00 |v...(...|$.......|
|00000960| 01 00 04 00 00 00 00 00 | 68 01 00 00 00 00 00 00 |........|h.......|
|00000970| 00 00 00 00 10 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000980| 00 00 80 00 00 80 00 00 | 00 80 80 00 80 00 00 00 |........|........|
|00000990| 80 00 80 00 80 80 00 00 | c0 c0 c0 00 80 80 80 00 |........|........|
|000009a0| 00 00 ff 00 00 ff 00 00 | 00 ff ff 00 ff 00 00 00 |........|........|
|000009b0| ff 00 ff 00 ff ff 00 00 | ff ff ff 00 33 33 33 44 |........|....333D|
|000009c0| 44 44 33 33 33 33 33 3f | 88 88 88 3f 33 33 00 00 |DD33333?|...?33..|
|000009d0| 32 43 34 22 22 22 44 33 | 33 38 8f 38 33 33 33 88 |2C4"""D3|38.8333.|
|000009e0| f3 33 00 00 32 24 42 22 | 22 22 22 43 33 38 f8 83 |.3..2$B"|"""C38..|
|000009f0| 3f ff ff 33 8f 33 00 00 | 32 22 22 2a aa aa 22 24 |?..3.3..|2""*.."$|
|00000a00| 33 38 f3 33 f8 88 88 f3 | 38 f3 00 00 32 22 22 a3 |38.3....|8...2"".|
|00000a10| 33 33 a2 22 43 38 f3 3f | 83 33 33 8f 33 8f 00 00 |33."C8.?|.33.3...|
|00000a20| 32 22 22 33 33 33 3a 22 | 43 38 f3 38 33 33 33 38 |2""333:"|C8.83338|
|00000a30| f3 8f 00 00 32 22 22 23 | 33 33 3a 44 43 38 ff ff |....2""#|33:DC8..|
|00000a40| 8f 33 33 38 88 83 00 00 | 3a aa aa aa 33 33 33 33 |.338....|:...3333|
|00000a50| 33 38 88 88 88 33 33 33 | 33 33 00 00 33 33 33 33 |38...333|33..3333|
|00000a60| 33 33 33 33 33 33 33 33 | 33 33 33 ff ff ff 00 00 |33333333|333.....|
|00000a70| 33 33 33 33 33 33 44 44 | 44 33 ff ff 33 33 33 88 |333333DD|D3..333.|
|00000a80| 88 88 00 00 3a 44 43 33 | 33 3a 22 22 24 38 88 8f |....:DC3|3:""$8..|
|00000a90| 33 33 38 f3 33 38 00 00 | 3a 22 43 33 33 33 a2 22 |338.38..|:"C333."|
|00000aa0| 24 38 f3 8f 33 33 33 83 | 33 38 00 00 33 a2 24 33 |$8..333.|38..3.$3|
|00000ab0| 33 34 42 22 24 33 83 38 | ff ff f8 83 33 38 00 00 |34B"$3.8|....38..|
|00000ac0| 33 a2 22 44 44 42 22 22 | 24 33 8f 33 88 88 83 33 |3."DDB""|$3.3...3|
|00000ad0| ff 38 00 00 33 3a 22 22 | 22 22 22 aa 24 33 38 ff |.8..3:""|""".$38.|
|00000ae0| 33 33 33 ff 88 f8 00 00 | 33 33 aa 22 22 22 aa 33 |333.....|33.""".3|
|00000af0| a3 33 33 88 ff ff ff 88 | 33 83 00 00 33 33 33 aa |.33.....|3...333.|
|00000b00| aa aa 33 33 33 33 33 33 | 88 88 88 33 33 33 00 00 |..333333|...333..|
|00000b10| 33 33 33 33 33 33 33 33 | 33 33 33 33 33 33 33 33 |33333333|33333333|
|00000b20| 33 33 00 00 09 4e 75 6d | 47 6c 79 70 68 73 02 02 |33...Num|Glyphs..|
|00000b30| 00 00 05 54 45 64 69 74 | 0a 65 66 58 4d 50 6c 61 |...TEdit|.efXMPla|
|00000b40| 62 65 6c 04 4c 65 66 74 | 03 80 00 03 54 6f 70 02 |bel.Left|....Top.|
|00000b50| 5d 05 57 69 64 74 68 03 | ac 00 06 48 65 69 67 68 |].Width.|...Heigh|
|00000b60| 74 02 15 04 48 69 6e 74 | 06 11 55 73 65 20 25 20 |t...Hint|..Use % |
|00000b70| 61 73 20 77 69 6c 64 63 | 61 72 64 0e 50 61 72 65 |as wildc|ard.Pare|
|00000b80| 6e 74 53 68 6f 77 48 69 | 6e 74 08 08 53 68 6f 77 |ntShowHi|nt..Show|
|00000b90| 48 69 6e 74 09 08 54 61 | 62 4f 72 64 65 72 02 02 |Hint..Ta|bOrder..|
|00000ba0| 04 54 65 78 74 06 09 65 | 78 69 66 3a 47 50 53 25 |.Text..e|xif:GPS%|
|00000bb0| 00 00 0c 54 52 61 64 69 | 6f 42 75 74 74 6f 6e 09 |...TRadi|oButton.|
|00000bc0| 72 62 43 6f 6e 74 61 69 | 6e 04 4c 65 66 74 02 0d |rbContai|n.Left..|
|00000bd0| 03 54 6f 70 02 29 05 57 | 69 64 74 68 03 ac 00 06 |.Top.).W|idth....|
|00000be0| 48 65 69 67 68 74 02 11 | 07 43 61 70 74 69 6f 6e |Height..|.Caption|
|00000bf0| 06 18 69 6d 61 67 65 73 | 20 63 6f 6e 74 61 69 6e |..images| contain|
|00000c00| 20 58 4d 50 20 6c 61 62 | 65 6c 07 43 68 65 63 6b | XMP lab|el.Check|
|00000c10| 65 64 09 08 54 61 62 4f | 72 64 65 72 02 00 07 54 |ed..TabO|rder...T|
|00000c20| 61 62 53 74 6f 70 09 00 | 00 0c 54 52 61 64 69 6f |abStop..|..TRadio|
|00000c30| 42 75 74 74 6f 6e 0c 72 | 62 4e 6f 74 43 6f 6e 74 |Button.r|bNotCont|
|00000c40| 61 69 6e 04 4c 65 66 74 | 02 0d 03 54 6f 70 02 3e |ain.Left|...Top.>|
|00000c50| 05 57 69 64 74 68 03 ab | 00 06 48 65 69 67 68 74 |.Width..|..Height|
|00000c60| 02 11 07 43 61 70 74 69 | 6f 6e 06 1f 69 6d 61 67 |...Capti|on..imag|
|00000c70| 65 73 20 64 6f 20 6e 6f | 74 20 63 6f 6e 74 61 69 |es do no|t contai|
|00000c80| 6e 20 58 4d 4c 20 6c 61 | 62 65 6c 08 54 61 62 4f |n XML la|bel.TabO|
|00000c90| 72 64 65 72 02 01 00 00 | 0b 54 69 64 53 63 72 69 |rder....|.TidScri|
|00000ca0| 70 74 65 72 00 12 53 6f | 75 72 63 65 43 6f 64 65 |pter..So|urceCode|
|00000cb0| 2e 53 74 72 69 6e 67 73 | 01 06 48 70 72 6f 63 65 |.Strings|..Hproce|
|00000cc0| 64 75 72 65 20 49 6e 69 | 74 69 61 6c 69 7a 65 3b |dure Ini|tialize;|
|00000cd0| 20 20 20 20 2f 2f 20 75 | 73 65 20 74 68 69 73 20 | // u|se this |
|00000ce0| 70 72 6f 63 65 64 75 72 | 65 20 66 6f 72 20 67 6c |procedur|e for gl|
|00000cf0| 6f 62 61 6c 20 69 6e 69 | 74 69 61 6c 69 7a 61 74 |obal ini|tializat|
|00000d00| 69 6f 6e 06 05 62 65 67 | 69 6e 06 26 20 20 4d 61 |ion..beg|in.& Ma|
|00000d10| 69 6e 46 6f 72 6d 2e 50 | 6f 73 69 74 69 6f 6e 20 |inForm.P|osition |
|00000d20| 3a 3d 20 70 6f 53 63 72 | 65 65 6e 43 65 6e 74 65 |:= poScr|eenCente|
|00000d30| 72 3b 06 5f 20 20 65 66 | 58 4d 50 6c 61 62 65 6c |r;._ ef|XMPlabel|
|00000d40| 2e 54 65 78 74 20 3a 3d | 20 52 65 61 64 46 72 6f |.Text :=| ReadFro|
|00000d50| 6d 52 65 67 69 73 74 72 | 79 20 28 27 53 63 72 69 |mRegistr|y ('Scri|
|00000d60| 70 74 73 5c 58 4d 50 6c | 61 62 65 6c 53 65 61 72 |pts\XMPl|abelSear|
|00000d70| 63 68 27 2c 20 27 4c 61 | 73 74 51 75 65 72 79 27 |ch', 'La|stQuery'|
|00000d80| 2c 20 65 66 58 4d 50 6c | 61 62 65 6c 2e 54 65 78 |, efXMPl|abel.Tex|
|00000d90| 74 29 3b 06 04 65 6e 64 | 3b 06 00 06 46 70 72 6f |t);..end|;...Fpro|
|00000da0| 63 65 64 75 72 65 20 46 | 69 6e 61 6c 69 7a 65 3b |cedure F|inalize;|
|00000db0| 20 20 20 20 20 20 2f 2f | 20 75 73 65 20 74 68 69 | //| use thi|
|00000dc0| 73 20 70 72 6f 63 65 64 | 75 72 65 20 66 6f 72 20 |s proced|ure for |
|00000dd0| 67 6c 6f 62 61 6c 20 66 | 69 6e 61 6c 69 7a 61 74 |global f|inalizat|
|00000de0| 69 6f 6e 06 05 62 65 67 | 69 6e 06 4b 20 20 57 72 |ion..beg|in.K Wr|
|00000df0| 69 74 65 54 6f 52 65 67 | 69 73 74 72 79 20 28 27 |iteToReg|istry ('|
|00000e00| 53 63 72 69 70 74 73 5c | 58 4d 50 6c 61 62 65 6c |Scripts\|XMPlabel|
|00000e10| 53 65 61 72 63 68 27 2c | 20 27 4c 61 73 74 51 75 |Search',| 'LastQu|
|00000e20| 65 72 79 27 2c 20 65 66 | 58 4d 50 6c 61 62 65 6c |ery', ef|XMPlabel|
|00000e30| 2e 54 65 78 74 29 3b 06 | 04 65 6e 64 3b 06 00 06 |.Text);.|.end;...|
|00000e40| 17 70 72 6f 63 65 64 75 | 72 65 20 70 62 51 75 65 |.procedu|re pbQue|
|00000e50| 72 79 43 6c 69 63 6b 3b | 06 03 76 61 72 06 1b 20 |ryClick;|..var.. |
|00000e60| 20 41 44 73 3a 20 54 44 | 42 58 4f 4d 43 6c 69 65 | ADs: TD|BXOMClie|
|00000e70| 6e 74 44 61 74 61 53 65 | 74 3b 06 0f 20 20 61 4e |ntDataSe|t;.. aN|
|00000e80| 6f 74 3a 20 73 74 72 69 | 6e 67 3b 06 05 62 65 67 |ot: stri|ng;..beg|
|00000e90| 69 6e 06 1f 20 20 53 63 | 72 65 65 6e 2e 43 75 72 |in.. Sc|reen.Cur|
|00000ea0| 73 6f 72 20 3a 3d 20 63 | 72 48 6f 75 72 47 6c 61 |sor := c|rHourGla|
|00000eb0| 73 73 3b 06 00 06 1c 20 | 20 41 44 73 20 3a 3d 20 |ss;.... | ADs := |
|00000ec0| 43 61 74 61 6c 6f 67 2e | 4e 65 77 44 61 74 61 73 |Catalog.|NewDatas|
|00000ed0| 65 74 3b 06 00 06 21 20 | 20 69 66 20 72 62 4e 6f |et;...! | if rbNo|
|00000ee0| 74 43 6f 6e 74 61 69 6e | 2e 63 68 65 63 6b 65 64 |tContain|.checked|
|00000ef0| 20 74 68 65 6e 20 20 20 | 06 16 20 20 20 20 20 20 | then |.. |
|00000f00| 61 4e 6f 74 20 3a 3d 20 | 27 20 4e 4f 54 20 27 3b |aNot := |' NOT ';|
|00000f10| 06 06 20 20 65 6c 73 65 | 06 12 20 20 20 20 20 20 |.. else|.. |
|00000f20| 61 4e 6f 74 20 3a 3d 20 | 27 20 27 3b 06 00 06 49 |aNot := |' ';...I|
|00000f30| 20 20 41 44 73 2e 43 6f | 6d 6d 61 6e 64 54 65 78 | ADs.Co|mmandTex|
|00000f40| 74 20 3a 3d 20 27 73 65 | 6c 65 63 74 20 69 2e 2a |t := 'se|lect i.*|
|00000f50| 20 66 72 6f 6d 20 76 5f | 43 61 74 61 6c 6f 67 49 | from v_|CatalogI|
|00000f60| 74 65 6d 20 69 20 77 68 | 65 72 65 20 69 2e 47 55 |tem i wh|ere i.GU|
|00000f70| 49 44 20 69 6e 20 27 20 | 2b 06 56 20 20 20 20 20 |ID in ' |+.V |
|00000f80| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000f90| 27 28 53 45 4c 45 43 54 | 20 44 49 53 54 49 4e 43 |'(SELECT| DISTINC|
|00000fa0| 54 20 49 6d 61 67 65 47 | 55 49 44 20 46 52 4f 4d |T ImageG|UID FROM|
|00000fb0| 20 69 64 49 6d 61 67 65 | 58 4d 50 20 57 48 45 52 | idImage|XMP WHER|
|00000fc0| 45 20 58 4d 50 5f 50 72 | 6f 70 65 72 74 79 27 20 |E XMP_Pr|operty' |
|00000fd0| 2b 06 27 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |+.' | |
|00000fe0| 20 20 20 20 20 20 20 20 | 61 4e 6f 74 20 2b 20 27 | |aNot + '|
|00000ff0| 4c 49 4b 45 20 27 27 27 | 20 2b 06 26 20 20 20 20 |LIKE '''| +.& |
|00001000| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001010| 20 65 66 58 4d 50 6c 61 | 62 65 6c 2e 54 65 78 74 | efXMPla|bel.Text|
|00001020| 20 2b 06 1b 20 20 20 20 | 20 20 20 20 20 20 20 20 | +.. | |
|00001030| 20 20 20 20 20 20 20 20 | 20 27 27 27 29 27 3b 06 | | ''')';.|
|00001040| 00 06 0b 20 20 41 44 73 | 2e 4f 70 65 6e 3b 06 25 |... ADs|.Open;.%|
|00001050| 20 20 53 65 61 72 63 68 | 52 65 73 75 6c 74 2e 49 | Search|Result.I|
|00001060| 74 65 6d 73 2e 41 64 64 | 44 61 74 61 73 65 74 20 |tems.Add|Dataset |
|00001070| 28 41 44 73 29 06 0c 20 | 20 41 44 73 2e 43 6c 6f |(ADs).. | ADs.Clo|
|00001080| 73 65 3b 06 00 06 2d 20 | 20 41 44 73 2e 46 72 65 |se;...- | ADs.Fre|
|00001090| 65 3b 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |e; | |
|000010a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000010b0| 20 20 20 20 06 00 06 1d | 20 20 53 63 72 65 65 6e | ....| Screen|
|000010c0| 2e 43 75 72 73 6f 72 20 | 3a 3d 20 63 72 44 65 66 |.Cursor |:= crDef|
|000010d0| 61 75 6c 74 3b 06 00 06 | 1f 20 20 4d 61 69 6e 46 |ault;...|. MainF|
|000010e0| 6f 72 6d 2e 4d 6f 64 61 | 6c 52 65 73 75 6c 74 20 |orm.Moda|lResult |
|000010f0| 3a 3d 20 6d 72 4f 6b 3b | 06 04 65 6e 64 3b 00 10 |:= mrOk;|..end;..|
|00001100| 53 61 76 65 43 6f 6d 70 | 69 6c 65 64 43 6f 64 65 |SaveComp|iledCode|
|00001110| 08 10 53 68 6f 72 74 42 | 6f 6f 6c 65 61 6e 45 76 |..ShortB|ooleanEv|
|00001120| 61 6c 08 1d 4c 69 62 4f | 70 74 69 6f 6e 73 2e 53 |al..LibO|ptions.S|
|00001130| 65 61 72 63 68 50 61 74 | 68 2e 53 74 72 69 6e 67 |earchPat|h.String|
|00001140| 73 01 06 09 24 28 43 55 | 52 44 49 52 29 06 09 24 |s...$(CU|RDIR)..$|
|00001150| 28 41 50 50 44 49 52 29 | 06 2a 44 3a 5c 69 64 46 |(APPDIR)|.*D:\idF|
|00001160| 4f 58 50 72 6f 6a 65 63 | 74 65 6e 5c 49 6d 61 67 |OXProjec|ten\Imag|
|00001170| 65 42 72 6f 77 73 65 72 | 5c 53 63 72 69 70 74 4c |eBrowser|\ScriptL|
|00001180| 69 62 73 5c 00 18 4c 69 | 62 4f 70 74 69 6f 6e 73 |ibs\..Li|bOptions|
|00001190| 2e 53 6f 75 72 63 65 46 | 69 6c 65 45 78 74 06 04 |.SourceF|ileExt..|
|000011a0| 2e 70 73 63 1a 4c 69 62 | 4f 70 74 69 6f 6e 73 2e |.psc.Lib|Options.|
|000011b0| 43 6f 6d 70 69 6c 65 64 | 46 69 6c 65 45 78 74 06 |Compiled|FileExt.|
|000011c0| 04 2e 70 63 75 19 4c 69 | 62 4f 70 74 69 6f 6e 73 |..pcu.Li|bOptions|
|000011d0| 2e 55 73 65 53 63 72 69 | 70 74 46 69 6c 65 73 09 |.UseScri|ptFiles.|
|000011e0| 11 43 61 6c 6c 45 78 65 | 63 48 6f 6f 6b 45 76 65 |.CallExe|cHookEve|
|000011f0| 6e 74 08 07 43 61 74 61 | 6c 6f 67 07 0d 43 61 74 |nt..Cata|log..Cat|
|00001200| 61 6c 6f 67 2e 4f 77 6e | 65 72 00 00 0d 54 53 53 |alog.Own|er...TSS|
|00001210| 45 76 65 6e 74 53 61 76 | 65 72 00 0e 53 63 72 69 |EventSav|er..Scri|
|00001220| 70 74 65 72 45 76 65 6e | 74 73 06 1e 70 62 51 75 |pterEven|ts..pbQu|
|00001230| 65 72 79 2e 4f 6e 43 6c | 69 63 6b 3d 70 62 51 75 |ery.OnCl|ick=pbQu|
|00001240| 65 72 79 43 6c 69 63 6b | 0d 0a 00 00 0b 54 41 44 |eryClick|.....TAD|
|00001250| 4f 44 61 74 61 53 65 74 | 0b 41 44 4f 44 61 74 61 |ODataSet|.ADOData|
|00001260| 53 65 74 31 0a 50 61 72 | 61 6d 65 74 65 72 73 0e |Set1.Par|ameters.|
|00001270| 00 00 00 00 00 00 0c 4d | 61 6e 75 61 6c 46 6f 72 |.......M|anualFor|
|00001280| 6d 61 74 07 07 73 6d 66 | 54 65 78 74 14 53 63 72 |mat..smf|Text.Scr|
|00001290| 69 70 74 52 65 73 6f 75 | 72 63 65 73 2e 47 55 49 |iptResou|rces.GUI|
|000012a0| 44 06 26 7b 46 37 31 38 | 30 41 30 35 2d 45 46 30 |D.&{F718|0A05-EF0|
|000012b0| 32 2d 34 37 36 44 2d 38 | 39 36 46 2d 41 35 38 46 |2-476D-8|96F-A58F|
|000012c0| 33 35 43 39 42 41 35 42 | 7d 0f 53 63 72 69 70 74 |35C9BA5B|}.Script|
|000012d0| 52 65 73 6f 75 72 63 65 | 73 0e 00 07 56 65 72 73 |Resource|s...Vers|
|000012e0| 69 6f 6e 06 03 31 2e 30 | 00 00 0b 47 72 6f 75 70 |ion..1.0|...Group|
|000012f0| 73 2e 47 55 49 44 06 26 | 7b 34 37 33 39 43 31 31 |s.GUID.&|{4739C11|
|00001300| 34 2d 33 30 38 46 2d 34 | 45 32 41 2d 42 35 33 33 |4-308F-4|E2A-B533|
|00001310| 2d 39 43 35 39 35 37 34 | 44 31 32 39 31 7d 06 47 |-9C59574|D1291}.G|
|00001320| 72 6f 75 70 73 0e 00 00 | 00 |roups...|. |
+--------+-------------------------+-------------------------+--------+--------+